<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%> <% strSQL = "SELECT TOP 1 us1 FROM about_us_info" SET rs = Conn.Execute(strSQL) If rs.BOF AND rs.EOF Then AboutUs1 = "" Else AboutUs1 = rs("us1") End If Call rsClose() %> <% strSQL = "SELECT TOP 1 us2 FROM about_us_info" SET rs = Conn.Execute(strSQL) If rs.BOF AND rs.EOF Then AboutUs2 = "" Else AboutUs2 = rs("us2") End If Call rsClose() %> <% id = Trim(Request.QueryString("id")) If id ="" Then id = 1 End If strSQL = "SELECT TOP 1 * FROM lawinfo WHERE [ID] = " & id SET rs = Conn.Execute(strSQL) If rs.BOF AND rs.EOF Then Response.Redirect("index.asp") Response.End() Else Title = rs("L_NAME") PST = rs("L_POSITION") WA = rs("L_WT") MEMO = rs("L_DETAIL") SMEMO = rs("homeinfo") PIC = rs("L_PIC") End If Call rsClose() strSQL = "UPDATE LAWINFO SET L_Count = L_Count + 1 WHERE [ID] = " & id Conn.Execute(strSQL) %> 亚美加移民律师 - <%= Title %>
律 师 档 案

注册律师:<% =title %>

<%if wa<>"" then%> <%end if%>
姓 名: <% =title %>
职 称: <% =PST %>
从业资历 : <% =WA %>年
<% =MEMO %>
友情链接 更多>>
<% strSQL = "SELECT * FROM LINK_LIST where P_TYPE=1 order by id" SET rs = Conn.Execute(strSQL) If Not (rs.BOF AND rs.EOF) Then Do While Not rs.EOF %>
  • " target="_blank" title="<%=rs("P_Name")%>">" alt="<%=rs("P_Name")%>" />
  • <% rs.MoveNext Loop End If Call rsClose() %>
    移民项目 | 加拿大移民 / 英国移民 / 美国移民 / 香港定居 / 澳洲移民 / 新加坡移民 / 菲律宾移民 | 移民动态 | 海外生活 | 安家服务 | 云南分公司
    关于我们 | 联系我们 | 在线评估 | 人才招聘
    深圳市亚美加因私出入境服务有限公司 版权所有 Copyright © 1996-2014 amega.ca All rights reserved.
    地址:深圳市罗湖区南湖路3009号国贸商厦19A 518001
    电话: 86(0755) 82233844 传真:86(0755) 82222544
    粤ICP备12091534号